home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / windows / dessol.zip / _SETUP.1 / DsqSln32.exe / 0 / RCDATA / TLAUNCHFRM / TLAUNCHFRM.txt < prev   
Text File  |  1996-08-17  |  2KB  |  111 lines
  1. object LaunchFrm: TLaunchFrm
  2.   Left = 363
  3.   Top = 597
  4.   HelpContext = 1004
  5.   BorderIcons = [biSystemMenu, biMinimize]
  6.   BorderStyle = bsSingle
  7.   Caption = 'DesqTop Solutions'
  8.   ClientHeight = 34
  9.   ClientWidth = 252
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   OnActivate = FormActivate
  15.   OnClose = FormClose
  16.   OnCloseQuery = FormCloseQuery
  17.   OnCreate = FormCreate
  18.   OnShow = FormShow
  19.   PixelsPerInch = 96
  20.   TextHeight = 16
  21.   object ClockPnl: TPanel
  22.     Tag = 10
  23.     Left = 0
  24.     Top = 0
  25.     Width = 40
  26.     Height = 34
  27.     Hint = 'Screen Saver Launcher & Wallpaper Changer'
  28.     Align = alLeft
  29.     BevelInner = bvLowered
  30.     BevelOuter = bvLowered
  31.     BorderStyle = bsSingle
  32.     Caption = '12:00'
  33.     Color = clBlack
  34.     Font.Color = clLime
  35.     Font.Height = -9
  36.     Font.Name = 'MS Sans Serif'
  37.     Font.Style = []
  38.     ParentFont = False
  39.     ParentShowHint = False
  40.     ShowHint = True
  41.     TabOrder = 0
  42.     OnMouseUp = ClockPnlMouseDown
  43.   end
  44.   object Timer1: TTimer
  45.     Enabled = False
  46.     Interval = 250
  47.     OnTimer = Timer1Timer
  48.     Left = 42
  49.     Top = 4
  50.   end
  51.   object Validator: TValidator
  52.     RandSeed = 3299
  53.     IniFileName = 'DESKSOL.INI'
  54.     OnVldOk = ValidatorVldOk
  55.     OnVldFailed = ValidatorVldFailed
  56.     Left = 70
  57.     Top = 4
  58.   end
  59.   object Reg: TRegFile
  60.     Key = 'AppEvents\Schemes\Apps\.Default'
  61.     Left = 98
  62.     Top = 4
  63.   end
  64.   object JustOne321: TJustOne32
  65.     Left = 184
  66.     Top = 4
  67.   end
  68.   object SSTrayIcon: TTrayIcon
  69.     Picture.Data = {<image000.unknown>}
  70.     PopupMenu = TrayPopUpMn
  71.     ShowHint = True
  72.     Hint = 'Launch Screen Saver'
  73.     OnMouseUp = TrayIconClick
  74.     Left = 128
  75.     Top = 4
  76.   end
  77.   object BMPTrayIcon: TTrayIcon
  78.     Picture.Data = {<image001.unknown>}
  79.     PopupMenu = TrayPopUpMn
  80.     ShowHint = True
  81.     Hint = 'Change Wallpaper'
  82.     OnMouseUp = TrayIconClick
  83.     Left = 156
  84.     Top = 4
  85.   end
  86.   object TrayPopUpMn: TPopupMenu
  87.     Left = 214
  88.     Top = 4
  89.     object ConfigItm: TMenuItem
  90.       Caption = '&Configuration'
  91.       Default = True
  92.       ShortCut = 0
  93.       OnClick = ConfigItmClick
  94.     end
  95.     object HelpItm: TMenuItem
  96.       Caption = '&Help'
  97.       ShortCut = 0
  98.       OnClick = HelpItmClick
  99.     end
  100.     object N1: TMenuItem
  101.       Caption = '-'
  102.       ShortCut = 0
  103.     end
  104.     object ExitItm: TMenuItem
  105.       Caption = 'E&xit'
  106.       ShortCut = 0
  107.       OnClick = ExitItmClick
  108.     end
  109.   end
  110. end
  111.